Public Class Role

    Private _roleName As String
    Private _description As String
    Private _isUserInRole As Boolean
    Private _numberOfUsersInRole As Integer

    Public Property RoleName() As String
        Get
            Return _roleName
        End Get
        Set(ByVal value As String)
            _roleName = value
        End Set
    End Property

    Public Property Description() As String
        Get
            Return _description
        End Get
        Set(ByVal value As String)
            _description = value
        End Set
    End Property

    Public Property IsUserInRole() As Boolean
        Get
            Return _isUserInRole
        End Get
        Set(ByVal value As Boolean)
            _isUserInRole = value
        End Set
    End Property

    Public Property NumberOfUsersInRole() As Integer
        Get
            Return _numberOfUsersInRole
        End Get
        Set(ByVal value As Integer)
            _numberOfUsersInRole = value
        End Set
    End Property

End Class
